home *** CD-ROM | disk | FTP | other *** search
/ Colson Caster Selection Guide 3 / Colson Caster Selection Guide 3.0.iso / data1.cab / Program_Executable_Files / colsoncd.dxr / Internal_39.ls < prev    next >
Encoding:
Text File  |  2000-01-12  |  1.2 KB  |  26 lines
  1. on mouseUp
  2.   put EMPTY into field "qt"
  3.   put EMPTY into field "ln"
  4.   put " " into field "tempfield"
  5.   put field "Tblcaste,DESCRIP" into item 1 of field "tempfield"
  6.   put field "Tblcaste,CA_MOD" into item 2 of field "tempfield"
  7.   put field "mainmounting" into item 3 of field "tempfield"
  8.   put field "Tblcaste,DIAMETER" into item 4 of field "tempfield"
  9.   put field "Tblcaste,TR_WD" into item 5 of field "tempfield"
  10.   put field "Tblcaste,CAPACITY" into item 6 of field "tempfield"
  11.   put field "Tblcaste,WHEELDES" into item 7 of field "tempfield"
  12.   put field "Tblcaste,BEARING" into item 8 of field "tempfield"
  13.   put field "Tblcaste,LD_HT" into item 9 of field "tempfield"
  14.   put field "Tblcaste,SWI_RAD" into item 10 of field "tempfield"
  15.   put field "Tblcaste,FORK_SPAC" into item 11 of field "tempfield"
  16.   put field "Tblcaste,WT" into item 12 of field "tempfield"
  17.   put field "mainop" into item 13 of field "tempfield"
  18.   put field "Tblcaste,CASTER_PIC" into item 14 of field "tempfield"
  19.   put field "tblwheel,W_PHOTO" into item 15 of field "tempfield"
  20.   put field "Tblcaste,DIM_PIC" into item 17 of field "tempfield"
  21.   puppetSound("mainsnd")
  22.   set the puppet of sprite 10 to 0
  23.   puppetTransition(47, 1, 8)
  24.   play frame the frame + 1
  25. end
  26.